package Billing::HTTP::Session;

use base 'Billing::DBI';

Billing::HTTP::Session->table('http__session');
Billing::HTTP::Session->columns(All=>qw/id sid cdate user json/);
Billing::HTTP::Session->has_a(cdate=>'Class::Date');
Billing::HTTP::Session->has_a(user=>'Billing::User');
Billing::HTTP::Session->has_a
(
    json	=> 'JSON',
    inflate	=> 'JSON::from_json',
    deflate	=> sub {JSON::to_json(shift)},
#    inflate	=> sub {JSON::from_json(shift)},
);
